#ifndef __M_HELPER_H__
#define __M_HELPER_H__

#include <iostream>
#include <fstream>
#include <sstream>

#include <string>
#include <vector>
#include <list>

#include <random>
#include <iomanip>

#include <atomic>
#include <mutex>

#include <cstring>
#include <cerrno>

#include <sys/stat.h>
#include <sqlite3.h>

#include "mq_logger.hpp"

namespace zymq
{
    class SqliteHelper
    {
    public:
        typedef int (*SqliteCallback)(void *, int, char **, char **);

        SqliteHelper(const std::string &dbfile) : _dbfile(dbfile), _handler(nullptr) {}
        bool open(int safe_level = SQLITE_OPEN_FULLMUTEX)
        {
            int ret = sqlite3_open_v2(_dbfile.c_str(), &_handler,
                                      SQLITE_OPEN_READWRITE | SQLITE_OPEN_CREATE | safe_level, nullptr);
            if (ret != SQLITE_OK)
            {
                ELOG("打开/创建sqlite数据库失败: %s", sqlite3_errmsg(_handler));
                return false;
            }
            return true;
        }
        bool exec(const std::string &sql, SqliteCallback cb, void *arg)
        {
            int ret = sqlite3_exec(_handler, sql.c_str(), cb, arg, nullptr);
            if (ret != SQLITE_OK)
            {
                ELOG("%s \n执行语句失败: %s", sql.c_str(), sqlite3_errmsg(_handler));
                return false;
            }
            return true;
        }
        void close()
        {
            if (_handler)
                sqlite3_close_v2(_handler);
        }

    private:
        std::string _dbfile;
        sqlite3 *_handler;
    };

    class StrHelper
    {
    public:
        static size_t split(const std::string &str, const std::string &sep, std::vector<std::string> &ret)
        {
            // news....music.*.pop
            int pos, idx = 0;
            while (idx < str.size())
            {
                pos = str.find(sep, idx);
                if (pos == std::string::npos)
                {
                    ret.push_back(str.substr(idx));
                    return ret.size();
                }

                if (pos == idx)
                {
                    idx += sep.size();
                    continue;
                }

                ret.push_back(str.substr(idx, pos - idx));
                idx = pos + sep.size();
            }
            return ret.size();
        }
    };

    class UUIDHelper
    {
    public:
        static std::string uuid()
        {
            std::random_device rd;
            std::mt19937_64 generator(rd());
            std::uniform_int_distribution<int> distribution(0, 255);

            std::stringstream ss;
            for (int i = 0; i < 8; i++)
            {
                ss << std::setw(2) << std::setfill('0') << std::hex << distribution(generator);
                if (i == 3 || i == 5 || i == 7)
                    ss << "-";
            }

            static std::atomic<size_t> seq(1);
            size_t num = seq.fetch_add(1);
            for (int i = 7; i >= 0; i--)
            {
                ss << std::setw(2) << std::setfill('0') << std::hex << (num >> (i * 8) & 0xff);
                if (i == 6)
                    ss << "-";
            }

            return ss.str();
        }
    };

    class FileHelper
    {
    public:
        FileHelper(const std::string &filename) : _filename(filename) {}

        bool exists()
        {
            struct stat st;
            return stat(_filename.c_str(), &st) == 0;
        }
        size_t size()
        {
            struct stat st;
            if (stat(_filename.c_str(), &st) < 0)
                return 0;
            return st.st_size;
        }

        bool read(char *body, size_t offset, size_t len)
        {
            // 打开-》偏移位置-》读取-》关闭

            // 文件存在：成功打开文件，获得文件的只读权限，且以二进制模式处理数据。
            // 文件不存在：打开失败，ifs 流对象处于 “无效状态”。
            std::ifstream ifs(_filename, std::ios::binary | std::ios::in);
            if (ifs.is_open() == false)
            {
                ELOG("%s 文件打开失败!", _filename.c_str());
                return false;
            }

            ifs.seekg(offset, std::ios::beg);

            ifs.read(body, len);
            if (ifs.good() == false)
            {
                ELOG("%s 文件读取数据失败!", _filename.c_str());
                ifs.close();
                return false;
            }

            ifs.close();
            return true;
        }
        bool read(std::string &body)
        {
            size_t fsize = this->size();
            body.resize(fsize);
            return read(&body[0], 0, fsize);
        }
        bool write(const char *body, size_t offset, size_t len)
        {
            // 打开-》偏移位置(必须具有读权限才能跳转位置)-》写入-》关闭

            // 文件存在：成功打开文件，获得文件的读写权限，且以二进制模式处理数据，保留文件原有内容
            // 文件不存在：打开失败，fs 流对象处于 “无效状态”。ios::in 抑制了 ios::out 的默认清空行为
            std::fstream fs(_filename, std::ios::binary | std::ios::in | std::ios::out);
            if (fs.is_open() == false)
            {
                ELOG("%s 文件打开失败!", _filename.c_str());
                return false;
            }

            fs.seekp(offset, std::ios::beg);

            fs.write(body, len);
            if (fs.good() == false)
            {
                ELOG("%s 文件写入数据失败!", _filename.c_str());
                fs.close();
                return false;
            }

            fs.close();
            return true;
        }

        bool write(const std::string &body)
        {
            return write(body.c_str(), 0, body.size());
        }
        static std::string parentDirectory(const std::string &filename)
        {
            size_t pos = filename.find_last_of("/");
            if (pos == std::string::npos)
            {
                // test.txt
                return "./";
            }
            return filename.substr(0, pos);
        }

        bool rename(const std::string &nname)
        {
            return ::rename(_filename.c_str(), nname.c_str()) == 0;
        }
        static bool createFile(const std::string &filename)
        {
            // 文件存在：成功打开文件，获得文件的只写权限，以二进制模式处理数据，且会清空文件原有内容。
            // 文件不存在：成功创建文件并打开，获得只写权限，以二进制模式处理数据。
            std::fstream ofs(filename, std::ios::binary | std::ios::out);
            if (ofs.is_open() == false)
            {
                ELOG("%s 文件打开失败!", filename.c_str());
                return false;
            }
            ofs.close();
            return true;
        }
        static bool removeFile(const std::string &filename)
        {
            return ::remove(filename.c_str()) == 0;
        }
        static bool createDirectory(const std::string &path)
        {
            // ./a/b/c/d 则需要依此创建 a; a/b; a/b/c; a/b/c/d
            size_t pos, idx = 0;
            while (idx < path.size())
            {
                pos = path.find("/", idx);
                if (pos == std::string::npos)
                    return ::mkdir(path.c_str(), 0775) == 0;

                std::string subpath = path.substr(0, pos);
                int ret = ::mkdir(subpath.c_str(), 0775);
                if (ret != 0 && errno != EEXIST)
                {
                    ELOG("创建目录 %s 失败: %s", subpath.c_str(), strerror(errno));
                    return false;
                }
                idx = pos + 1;
            }
            return true;
        }
        static bool removeDirectory(const std::string &path)
        {
            std::string cmd = "rm -rf " + path;
            return ::system(cmd.c_str()) != -1;
        }

    private:
        std::string _filename;
    };
}

#endif